home *** CD-ROM | disk | FTP | other *** search
/ Utilities Professional 1-1500 / Utilities Professional 1-1500 (1994)(WPD)[!].iso / 12511500 / var1353.dms / var1353.adf / TEXTPLUS / TPP501.lha / TPP / Rexx / 1.preview next >
Text File  |  1994-01-05  |  266b  |  10 lines
  1. /* brings TextPlus to front (started from Preview) */
  2. options results
  3.  
  4. IF (SHOW('P', 'TextPlus')) THEN DO
  5.     ADDRESS 'TextPlus' 'ScreenToFront'
  6.     ADDRESS 'TextPlus' 'WindowToFront'
  7.     ADDRESS 'TextPlus' 'GetName'
  8.     ADDRESS 'TextPlus' 'Activate' result
  9.     END
  10.